home *** CD-ROM | disk | FTP | other *** search
/ Invenzioni & Inventori / Invenzioni and Inventori (Eclectica Publishing) (1996).ISO / invenzio / extraurb / mi076.dir / 00025_Script_25 < prev    next >
Text File  |  1983-01-30  |  608b  |  26 lines
  1. on enterframe
  2.   vitt 1,48
  3.   cursor 4
  4.   sound close 1
  5. end
  6. on exitframe
  7.   global pallina_chiusa,audio_barrato,lista_en_viaggio,canale_audio,audio_intro,canale_pallina,viff_da,viff_a,pallina_aperta,dove_articolo
  8.   global audio,pallina,dove,a_blocca,a_blocca
  9.   global anim_loco
  10.   global suonaaudio
  11.   set suonaaudio = true
  12.   set anim_loco to false
  13.   spegni_canali
  14.   if dove <> dove_articolo+1 then
  15.     set dove to 0
  16.     set a_blocca to false
  17.   end if
  18.   set audio to audio_barrato
  19.   set pallina to pallina_aperta
  20.   viff viff_da,viff_a
  21.   gestione_cursori   -- ex curan e curap
  22.   
  23.   
  24.   
  25. end
  26.